home *** CD-ROM | disk | FTP | other *** search
/ Star Festival... a Return to Japan / Star Festival... a Return to Japan.iso / pc / STARFESTIVAL / 09p5.dir / 00001.ls next >
Encoding:
Text File  |  1999-04-06  |  1.7 KB  |  62 lines
  1. on startMovie
  2.   global gKnobSprite, gSendMovie, gCursorReady, gKnobState
  3.   puppetSprite(48, 1)
  4.   gCursorReady = 1
  5.   gKnobSprite = 14
  6.   gSendMovie = "01p3"
  7.   setUpKnob()
  8.   set the mouseDownScript to EMPTY
  9.   set the mouseUpScript to EMPTY
  10. end
  11.  
  12. on idle
  13.   global gCursorReady
  14.   if gCursorReady = 1 then
  15.     cursor(200)
  16.     checkCursors()
  17.     set the locH of sprite 48 to the mouseH
  18.     set the locV of sprite 48 to the mouseV
  19.     updateStage()
  20.   end if
  21. end
  22.  
  23. on checkCursors
  24.   global gMagCursor
  25.   gMagCursor = "magCursor"
  26.   set the castNum of sprite 48 to the number of member "curs1"
  27.   repeat with i = 4 to 7
  28.     if the castNum of sprite i and rollOver(i) then
  29.       set the castNum of sprite 48 to the number of member gMagCursor
  30.     end if
  31.   end repeat
  32.   if the castNum of sprite 8 and rollOver(8) then
  33.     set the castNum of sprite 48 to the number of member "deMagCursor"
  34.   end if
  35.   repeat with i = 15 to 17
  36.     if rollOver(i) then
  37.       set the castNum of sprite 48 to the number of member "hotCursor"
  38.     end if
  39.   end repeat
  40.   if the castNum of sprite 20 and rollOver(20) then
  41.     set the castNum of sprite 48 to the number of member "hotCursor"
  42.   end if
  43.   repeat with i = 26 to 28
  44.     if rollOver(i) then
  45.       set the castNum of sprite 48 to the number of member "linkCurs"
  46.     end if
  47.   end repeat
  48.   repeat with i = 30 to 31
  49.     if rollOver(i) then
  50.       set the castNum of sprite 48 to the number of member "hotCursor"
  51.     end if
  52.   end repeat
  53.   repeat with i = 40 to 42
  54.     if rollOver(i) then
  55.       set the castNum of sprite 48 to the number of member "hotCursor"
  56.     end if
  57.   end repeat
  58.   if the castNum of sprite 47 and rollOver(47) then
  59.     set the castNum of sprite 48 to the number of member "hotCursor"
  60.   end if
  61. end
  62.